UC知道[asp]无法删除记录啊
来源：百度知道 编辑：UC知道 时间：2024/06/01 13:55:31
<%
Sub delete()
Dim ID
Dim news2
Dim news2_numRows
ID = Request("ID")
Set news2 = Server.CreateObject("ADODB.Recordset")
news2.ActiveConnection = MM_conn_STRING
news2.Source = "SELECT * FROM news where ID = '"& ID &"'"
news2.CursorType = 1
news2.CursorLocation = 2
news2.LockType = 3
news2.Open()'------------此行出错.[80040e07|标准表达式中数据类型不匹配。]
news2.delete
news2_numRows = 0
news2.Close()
Set news2 = Nothing
End Sub
%>
以上的过程无法运行.
Sub delete()
Dim ID
Dim news2
Dim news2_numRows
ID = Request("ID")
Set news2 = Server.CreateObject("ADODB.Recordset")
news2.ActiveConnection = MM_conn_STRING
news2.Source = "SELECT * FROM news where ID = '"& ID &"'"
news2.CursorType = 1
news2.CursorLocation = 2
news2.LockType = 3
news2.Open()'------------此行出错.[80040e07|标准表达式中数据类型不匹配。]
news2.delete
news2_numRows = 0
news2.Close()
Set news2 = Nothing
End Sub
%>
以上的过程无法运行.
news2.Source = "SELECT * FROM news where ID = '"& ID &"'"
我不知道你数据库的ID的数据类型默认是数字，而你的ID = Request("ID") 是不是字符串而，一定是数字才行的哦，你看看是不是类型不对啊
哪有你写的那么麻烦啊
Set news2 = Server.CreateObject("ADODB.Recordset")
news2.ActiveConnection = MM_conn_STRING
news2.Source = "SELECT * FROM news where ID = '"& ID &"'"
news2.CursorType = 1
news2.CursorLocation = 2
news2.LockType = 3
news2.Open()'------------此行出错.[80040e07|标准表达式中数据类型不匹配。]
news2.delete
直接换成
set rs=Server.CreateObject("ADODB.Recordset")
sql="delete '"&id&'" from news"
rs.open sql,conn,1,3
就成了.一般ID是数字型的,加个单引号